* lisp/emacs-lisp/comp-cstr.el (comp-ctxt): Initialize it.

diff --git a/lisp/emacs-lisp/comp-cstr.el b/lisp/emacs-lisp/comp-cstr.el
index b87cbf7e83cf8321c1f46850700b47dcdd7e18fa..2a50ceb194ff49f8cee548bf8b24701008dff574 100644 (file)
--- a/lisp/emacs-lisp/comp-cstr.el
+++ b/lisp/emacs-lisp/comp-cstr.el
@@ -177,7 +177,7 @@ Return them as multiple value."
 
 ;; So we can load comp-cstr.el and comp.el in non native compiled
 ;; builds.
-(defvar comp-ctxt)
+(defvar comp-ctxt nil)
 
 (defvar comp-cstr-one (comp-value-to-cstr 1)
   "Represent the integer immediate one.")